Option Explicit
Sub A_Sample055()
    Dim mySht As Worksheet
    Dim myWb As Workbook
    Set myWb = Workbooks(1)
    'ǳƨ즹
    Set mySht = myWb.Worksheets.Add
    MsgBox mySht.Name
    Set mySht = Nothing	'
    Set myWb = Nothing
End Sub

